﻿Public Class Current

    Private Shared user As Usuario
    Private Shared language As Idioma

    Public Shared Property Usuario() As Usuario
        Get
            Return user
        End Get
        Set(ByVal value As Usuario)
            user = value
        End Set
    End Property

    Public Shared Property Idioma() As Idioma
        Get
            Return language
        End Get
        Set(ByVal value As Idioma)
            language = value
        End Set
    End Property

End Class
